home *** CD-ROM | disk | FTP | other *** search
- ECHO OFF
- CLS
- ECHO Y > INPUT
- ECHO Y >> INPUT
- ECHO Y >> INPUT
- ECHO Scanning floppy for infections...
- DEL ESCAN.ERR < INPUT
- DEL ESCAN.VIR < INPUT
-
- SCANPM A:\*.* /ALL
- IF ERRORLEVEL 1 GOTO VIRUS
- IF ERRORLEVEL 99 GOTO BADSCAN
-
- REM *** SCAN OK **
- GOTO EXIT
-
-
-
-
- REM ** CANNOT SCAN **
- :BADSCAN
- ECHO SCANERROR > ESCAN.ERR
- GOTO EXIT
-
-
- REM ** VIRUS WAS FOUND **
- :VIRUS
- ECHO INFECTED > ESCAN.VIR
- GOTO EXIT
-
-
- :EXIT
- CLS
-